      INTEGER OPRANK
      PARAMETER (MXRANK = MAXLBL)
      COMMON /INFRANK/ OPRANK(MXRANK)
